Monster Media 1996 #15/Monster Media Number 15 (Monster Media)(July 1996).ISO/prog_d/rtdc.zip/RTDCEDIT.DFM/RTDCEDIT.txt

Text File | 1995-09-05 | 6KB | 282 lines

object MappingEditor: TMappingEditor
  Left = 241
  Top = 134
  AutoScroll = False
  Caption = 'Field Mapping Definition'
  ClientHeight = 270
  ClientWidth = 426
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  PixelsPerInch = 96
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  TextHeight = 13
  object Bevel1: TBevel
    Left = 7
    Top = 33
    Width = 312
    Height = 65
  end
  object LblSource: TLabel
    Left = 13
    Top = 7
    Width = 92
    Height = 18
    AutoSize = False
    Caption = 'Source Field:'
  end
  object LblTarget: TLabel
    Left = 13
    Top = 46
    Width = 92
    Height = 19
    AutoSize = False
    Caption = 'Target Field:'
  end
  object LblType: TLabel
    Left = 111
    Top = 46
    Width = 66
    Height = 19
    AutoSize = False
    Caption = 'DataType'
  end
  object LblSize: TLabel
    Left = 189
    Top = 46
    Width = 36
    Height = 19
    AutoSize = False
    Caption = 'Size'
  end
  object GridMapping: TStringGrid
    Left = 8
    Top = 120
    Width = 311
    Height = 97
    DefaultColWidth = 70
    DefaultRowHeight = 20
    RowCount = 1
    FixedRows = 0
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
    ScrollBars = ssVertical
    TabOrder = 5
    OnClick = GridMappingClick
    ColWidths = (
      70
      70
      71
      38
      36)
  end
  object BtnAdd: TButton
    Left = 328
    Top = 32
    Width = 88
    Height = 25
    Caption = '&Add'
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 6
    OnClick = BtnAddClick
  end
  object BtnDelete: TButton
    Left = 328
    Top = 96
    Width = 88
    Height = 25
    Caption = '&Delete'
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 7
    OnClick = BtnDeleteClick
  end
  object BtnAddAll: TButton
    Left = 328
    Top = 64
    Width = 88
    Height = 25
    Caption = 'Add All'
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 8
    OnClick = BtnAddAllClick
  end
  object BtnDelAll: TButton
    Left = 328
    Top = 128
    Width = 88
    Height = 25
    Caption = 'Delete All'
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 9
    OnClick = BtnDelAllClick
  end
  object BtnOk: TBitBtn
    Left = 62
    Top = 232
    Width = 89
    Height = 25
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 10
    OnClick = BtnOkClick
    Kind = bkOK
  end
  object BtnCancel: TBitBtn
    Left = 166
    Top = 232
    Width = 89
    Height = 25
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 11
    OnClick = BtnCancelClick
    Kind = bkCancel
  end
  object CbxType: TComboBox
    Left = 111
    Top = 65
    Width = 72
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    TabOrder = 2
    OnChange = CbxTypeChange
  end
  object EdtSize: TMaskEdit
    Left = 189
    Top = 65
    Width = 40
    Height = 20
    EditMask = '99999;0; '
    MaxLength = 5
    TabOrder = 3
  end
  object CbEvent: TCheckBox
    Left = 241
    Top = 72
    Width = 72
    Height = 13
    Caption = 'FieldEvent'
    TabOrder = 4
  end
  object CbxSource: TComboBox
    Left = 111
    Top = 7
    Width = 117
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    TabOrder = 0
    OnChange = CbxSourceChange
  end
  object CbxTarget: TComboBox
    Left = 13
    Top = 65
    Width = 92
    Height = 21
    ItemHeight = 13
    TabOrder = 1
  end
  object GridHeading: THeader
    Left = 8
    Top = 104
    Width = 311
    Height = 17
    AllowResize = False
    Sections.Sections = (
      #0'70'#0'Source'
      #0'39'#0'Target')
    TabOrder = 12
  end
  object BtnHelp: TBitBtn
    Left = 270
    Top = 232
    Width = 89
    Height = 25
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 13
    OnClick = BtnHelpClick
    Kind = bkHelp
  end
  object BtnLoad: TButton
    Left = 328
    Top = 160
    Width = 89
    Height = 25
    Caption = '&Load'
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 14
    OnClick = BtnLoadClick
  end
  object BtnSave: TButton
    Left = 328
    Top = 192
    Width = 89
    Height = 25
    Caption = '&Save'
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 15
    OnClick = BtnSaveClick
  end
  object LoadDialog: TOpenDialog
    DefaultExt = 'txt'
    FileEditStyle = fsEdit
    Filter =
      'Text Files|*.txt|Ini Files|*.ini|Configuration Files|*.sys|All F' +
      'iles|*.*'
    Options = [ofPathMustExist, ofFileMustExist]
    Title = 'Load From File'
    Left = 8
    Top = 240
  end
  object SaveDialog: TSaveDialog
    DefaultExt = 'txt'
    FileEditStyle = fsEdit
    Filter =
      'Text Files|*.txt|Ini Files|*.ini|Configuration Files|*.sys|All F' +
      'iles|*.*'
    Options = [ofOverwritePrompt, ofPathMustExist]
    Title = 'Save To File'
    Left = 8
    Top = 216
  end
end